home *** CD-ROM | disk | FTP | other *** search
/ ftp.mactech.com 2010 / ftp.mactech.com.tar / ftp.mactech.com / thinkref / archive / THINKPascalUH2.1.sea / THINKPas Univ Hdr 2.1 / Interfaces / GXMessages.p < prev    next >
Text File  |  1995-09-12  |  2KB  |  97 lines
  1. { Converted with MPW2TPas Tuesday, September 12, 1995 6:47:04 PM }
  2. {
  3.      File:        GXMessages.p
  4.  
  5.      Contains:    This file contains all of the public data structures,
  6.  
  7.      Version:    Technology:    Quickdraw GX 1.1
  8.                  Package:    Universal Interfaces 2.1 in “MPW Latest” on ETO #18
  9.  
  10.      Copyright:    © 1984-1995 by Apple Computer, Inc.
  11.                  All rights reserved.
  12.  
  13.      Bugs?:        If you find a problem with this file, use the Apple Bug Reporter
  14.                  stack.  Include the file and version information (from above)
  15.                  in the problem description and send to:
  16.                      Internet:    apple.bugs@applelink.apple.com
  17.                      AppleLink:    APPLE.BUGS
  18.  
  19. }
  20.  
  21.  UNIT GXMessages;
  22.  INTERFACE
  23.  
  24.  
  25. {$IFC UNDEFINED __GXMESSAGES__}
  26. {$SETC __GXMESSAGES__ := 1}
  27.  
  28.   USES
  29.    ConditionalMacros, Types, MixedMode;
  30.  
  31. { $PUSH}
  32. { $ALIGN MAC68K}
  33. { $LibExport+}
  34. {
  35.  
  36.     >>>>>> CONSTANTS <<<<<<
  37.  
  38. }
  39. { Message Manager Trap }
  40.  
  41. CONST
  42.     messageManagerTrap            = $ABFB;
  43.  
  44. { Message Manager Gestalt Selector }
  45.     gestaltMessageMgrVersion    = 'mess';
  46.  
  47. { Message Manager Error Result Codes }
  48.     messageStopLoopingErr        = -5775;
  49.     cantDeleteRunningHandlerErr    = -5776;
  50.     noMessageTableErr            = -5777;
  51.     dupSignatureErr                = -5778;
  52.     messageNotReceivedErr        = -5799;
  53.  
  54. TYPE
  55.     MessageGlobalsInitProcPtr = ProcPtr;  { PROCEDURE MessageGlobalsInit(messageGlobals: UNIV Ptr); }
  56.     MessageGlobalsInitUPP = UniversalProcPtr;
  57.  
  58. CONST
  59.     uppMessageGlobalsInitProcInfo = $000000C1; { PROCEDURE (4 byte param); }
  60.  
  61. FUNCTION NewMessageGlobalsInitProc(userRoutine: MessageGlobalsInitProcPtr): MessageGlobalsInitUPP;
  62.     {$IFC NOT GENERATINGCFM }
  63.     INLINE $2E9F;
  64.     {$ENDC}
  65.  
  66. PROCEDURE CallMessageGlobalsInitProc(messageGlobals: UNIV Ptr; userRoutine: MessageGlobalsInitUPP);
  67.     {$IFC NOT GENERATINGCFM}
  68.     INLINE $205F, $4E90;
  69.     {$ENDC}
  70.     
  71. TYPE
  72.     MessageGlobalsInitProc = MessageGlobalsInitUPP;
  73.  
  74. {
  75.  
  76.     PUBLIC INTERFACES
  77.  
  78.     Message Handler API Routines
  79. }
  80.  
  81. {FUNCTION CountMessageHandlerInstances: LONGINT; C;}
  82. {FUNCTION GetMessageHandlerClassContext: Ptr; C;}
  83. {FUNCTION SetMessageHandlerClassContext(anyValue: UNIV Ptr): Ptr; C;}
  84. {FUNCTION GetMessageHandlerInstanceContext: Ptr; C;}
  85. {FUNCTION SetMessageHandlerInstanceContext(anyValue: UNIV Ptr): Ptr; C;}
  86. {FUNCTION NewMessageGlobals(messageGlobalsSize: LONGINT; initProc: MessageGlobalsInitUPP): OSErr; C;}
  87. {PROCEDURE DisposeMessageGlobals; C;}
  88.  
  89. { $ALIGN RESET}
  90. { $POP}
  91.  
  92. {$ENDC} {__GXMESSAGES__}
  93.  
  94.  IMPLEMENTATION
  95.  END.
  96.  
  97.